3.420 \(\int \frac{x \left (c+d x+e x^2\right )}{\sqrt{a+b x^3}} \, dx\)

Optimal. Leaf size=537 \[ -\frac{2 \sqrt{2+\sqrt{3}} \sqrt [3]{a} \left (\sqrt [3]{a}+\sqrt [3]{b} x\right ) \sqrt{\frac{a^{2/3}-\sqrt [3]{a} \sqrt [3]{b} x+b^{2/3} x^2}{\left (\left (1+\sqrt{3}\right ) \sqrt [3]{a}+\sqrt [3]{b} x\right )^2}} \left (2 a^{2/3} e+5 \left (1-\sqrt{3}\right ) b^{2/3} c\right ) F\left (\sin ^{-1}\left (\frac{\sqrt [3]{b} x+\left (1-\sqrt{3}\right ) \sqrt [3]{a}}{\sqrt [3]{b} x+\left (1+\sqrt{3}\right ) \sqrt [3]{a}}\right )|-7-4 \sqrt{3}\right )}{5 \sqrt [4]{3} b^{4/3} \sqrt{\frac{\sqrt [3]{a} \left (\sqrt [3]{a}+\sqrt [3]{b} x\right )}{\left (\left (1+\sqrt{3}\right ) \sqrt [3]{a}+\sqrt [3]{b} x\right )^2}} \sqrt{a+b x^3}}-\frac{\sqrt [4]{3} \sqrt{2-\sqrt{3}} \sqrt [3]{a} c \left (\sqrt [3]{a}+\sqrt [3]{b} x\right ) \sqrt{\frac{a^{2/3}-\sqrt [3]{a} \sqrt [3]{b} x+b^{2/3} x^2}{\left (\left (1+\sqrt{3}\right ) \sqrt [3]{a}+\sqrt [3]{b} x\right )^2}} E\left (\sin ^{-1}\left (\frac{\sqrt [3]{b} x+\left (1-\sqrt{3}\right ) \sqrt [3]{a}}{\sqrt [3]{b} x+\left (1+\sqrt{3}\right ) \sqrt [3]{a}}\right )|-7-4 \sqrt{3}\right )}{b^{2/3} \sqrt{\frac{\sqrt [3]{a} \left (\sqrt [3]{a}+\sqrt [3]{b} x\right )}{\left (\left (1+\sqrt{3}\right ) \sqrt [3]{a}+\sqrt [3]{b} x\right )^2}} \sqrt{a+b x^3}}+\frac{2 c \sqrt{a+b x^3}}{b^{2/3} \left (\left (1+\sqrt{3}\right ) \sqrt [3]{a}+\sqrt [3]{b} x\right )}+\frac{2 d \sqrt{a+b x^3}}{3 b}+\frac{2 e x \sqrt{a+b x^3}}{5 b} \]

[Out]

(2*d*Sqrt[a + b*x^3])/(3*b) + (2*e*x*Sqrt[a + b*x^3])/(5*b) + (2*c*Sqrt[a + b*x^
3])/(b^(2/3)*((1 + Sqrt[3])*a^(1/3) + b^(1/3)*x)) - (3^(1/4)*Sqrt[2 - Sqrt[3]]*a
^(1/3)*c*(a^(1/3) + b^(1/3)*x)*Sqrt[(a^(2/3) - a^(1/3)*b^(1/3)*x + b^(2/3)*x^2)/
((1 + Sqrt[3])*a^(1/3) + b^(1/3)*x)^2]*EllipticE[ArcSin[((1 - Sqrt[3])*a^(1/3) +
 b^(1/3)*x)/((1 + Sqrt[3])*a^(1/3) + b^(1/3)*x)], -7 - 4*Sqrt[3]])/(b^(2/3)*Sqrt
[(a^(1/3)*(a^(1/3) + b^(1/3)*x))/((1 + Sqrt[3])*a^(1/3) + b^(1/3)*x)^2]*Sqrt[a +
 b*x^3]) - (2*Sqrt[2 + Sqrt[3]]*a^(1/3)*(5*(1 - Sqrt[3])*b^(2/3)*c + 2*a^(2/3)*e
)*(a^(1/3) + b^(1/3)*x)*Sqrt[(a^(2/3) - a^(1/3)*b^(1/3)*x + b^(2/3)*x^2)/((1 + S
qrt[3])*a^(1/3) + b^(1/3)*x)^2]*EllipticF[ArcSin[((1 - Sqrt[3])*a^(1/3) + b^(1/3
)*x)/((1 + Sqrt[3])*a^(1/3) + b^(1/3)*x)], -7 - 4*Sqrt[3]])/(5*3^(1/4)*b^(4/3)*S
qrt[(a^(1/3)*(a^(1/3) + b^(1/3)*x))/((1 + Sqrt[3])*a^(1/3) + b^(1/3)*x)^2]*Sqrt[
a + b*x^3])

_______________________________________________________________________________________

Rubi [A]  time = 0.668483, antiderivative size = 537, normalized size of antiderivative = 1., number of steps used = 6, number of rules used = 6, integrand size = 23, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.261 \[ -\frac{2 \sqrt{2+\sqrt{3}} \sqrt [3]{a} \left (\sqrt [3]{a}+\sqrt [3]{b} x\right ) \sqrt{\frac{a^{2/3}-\sqrt [3]{a} \sqrt [3]{b} x+b^{2/3} x^2}{\left (\left (1+\sqrt{3}\right ) \sqrt [3]{a}+\sqrt [3]{b} x\right )^2}} \left (2 a^{2/3} e+5 \left (1-\sqrt{3}\right ) b^{2/3} c\right ) F\left (\sin ^{-1}\left (\frac{\sqrt [3]{b} x+\left (1-\sqrt{3}\right ) \sqrt [3]{a}}{\sqrt [3]{b} x+\left (1+\sqrt{3}\right ) \sqrt [3]{a}}\right )|-7-4 \sqrt{3}\right )}{5 \sqrt [4]{3} b^{4/3} \sqrt{\frac{\sqrt [3]{a} \left (\sqrt [3]{a}+\sqrt [3]{b} x\right )}{\left (\left (1+\sqrt{3}\right ) \sqrt [3]{a}+\sqrt [3]{b} x\right )^2}} \sqrt{a+b x^3}}-\frac{\sqrt [4]{3} \sqrt{2-\sqrt{3}} \sqrt [3]{a} c \left (\sqrt [3]{a}+\sqrt [3]{b} x\right ) \sqrt{\frac{a^{2/3}-\sqrt [3]{a} \sqrt [3]{b} x+b^{2/3} x^2}{\left (\left (1+\sqrt{3}\right ) \sqrt [3]{a}+\sqrt [3]{b} x\right )^2}} E\left (\sin ^{-1}\left (\frac{\sqrt [3]{b} x+\left (1-\sqrt{3}\right ) \sqrt [3]{a}}{\sqrt [3]{b} x+\left (1+\sqrt{3}\right ) \sqrt [3]{a}}\right )|-7-4 \sqrt{3}\right )}{b^{2/3} \sqrt{\frac{\sqrt [3]{a} \left (\sqrt [3]{a}+\sqrt [3]{b} x\right )}{\left (\left (1+\sqrt{3}\right ) \sqrt [3]{a}+\sqrt [3]{b} x\right )^2}} \sqrt{a+b x^3}}+\frac{2 c \sqrt{a+b x^3}}{b^{2/3} \left (\left (1+\sqrt{3}\right ) \sqrt [3]{a}+\sqrt [3]{b} x\right )}+\frac{2 d \sqrt{a+b x^3}}{3 b}+\frac{2 e x \sqrt{a+b x^3}}{5 b} \]

Antiderivative was successfully verified.

[In]  Int[(x*(c + d*x + e*x^2))/Sqrt[a + b*x^3],x]

[Out]

(2*d*Sqrt[a + b*x^3])/(3*b) + (2*e*x*Sqrt[a + b*x^3])/(5*b) + (2*c*Sqrt[a + b*x^
3])/(b^(2/3)*((1 + Sqrt[3])*a^(1/3) + b^(1/3)*x)) - (3^(1/4)*Sqrt[2 - Sqrt[3]]*a
^(1/3)*c*(a^(1/3) + b^(1/3)*x)*Sqrt[(a^(2/3) - a^(1/3)*b^(1/3)*x + b^(2/3)*x^2)/
((1 + Sqrt[3])*a^(1/3) + b^(1/3)*x)^2]*EllipticE[ArcSin[((1 - Sqrt[3])*a^(1/3) +
 b^(1/3)*x)/((1 + Sqrt[3])*a^(1/3) + b^(1/3)*x)], -7 - 4*Sqrt[3]])/(b^(2/3)*Sqrt
[(a^(1/3)*(a^(1/3) + b^(1/3)*x))/((1 + Sqrt[3])*a^(1/3) + b^(1/3)*x)^2]*Sqrt[a +
 b*x^3]) - (2*Sqrt[2 + Sqrt[3]]*a^(1/3)*(5*(1 - Sqrt[3])*b^(2/3)*c + 2*a^(2/3)*e
)*(a^(1/3) + b^(1/3)*x)*Sqrt[(a^(2/3) - a^(1/3)*b^(1/3)*x + b^(2/3)*x^2)/((1 + S
qrt[3])*a^(1/3) + b^(1/3)*x)^2]*EllipticF[ArcSin[((1 - Sqrt[3])*a^(1/3) + b^(1/3
)*x)/((1 + Sqrt[3])*a^(1/3) + b^(1/3)*x)], -7 - 4*Sqrt[3]])/(5*3^(1/4)*b^(4/3)*S
qrt[(a^(1/3)*(a^(1/3) + b^(1/3)*x))/((1 + Sqrt[3])*a^(1/3) + b^(1/3)*x)^2]*Sqrt[
a + b*x^3])

_______________________________________________________________________________________

Rubi in Sympy [A]  time = 70.8356, size = 474, normalized size = 0.88 \[ - \frac{\sqrt [4]{3} \sqrt [3]{a} c \sqrt{\frac{a^{\frac{2}{3}} - \sqrt [3]{a} \sqrt [3]{b} x + b^{\frac{2}{3}} x^{2}}{\left (\sqrt [3]{a} \left (1 + \sqrt{3}\right ) + \sqrt [3]{b} x\right )^{2}}} \sqrt{- \sqrt{3} + 2} \left (\sqrt [3]{a} + \sqrt [3]{b} x\right ) E\left (\operatorname{asin}{\left (\frac{- \sqrt [3]{a} \left (-1 + \sqrt{3}\right ) + \sqrt [3]{b} x}{\sqrt [3]{a} \left (1 + \sqrt{3}\right ) + \sqrt [3]{b} x} \right )}\middle | -7 - 4 \sqrt{3}\right )}{b^{\frac{2}{3}} \sqrt{\frac{\sqrt [3]{a} \left (\sqrt [3]{a} + \sqrt [3]{b} x\right )}{\left (\sqrt [3]{a} \left (1 + \sqrt{3}\right ) + \sqrt [3]{b} x\right )^{2}}} \sqrt{a + b x^{3}}} - \frac{4 \cdot 3^{\frac{3}{4}} \sqrt [3]{a} \sqrt{\frac{a^{\frac{2}{3}} - \sqrt [3]{a} \sqrt [3]{b} x + b^{\frac{2}{3}} x^{2}}{\left (\sqrt [3]{a} \left (1 + \sqrt{3}\right ) + \sqrt [3]{b} x\right )^{2}}} \sqrt{\sqrt{3} + 2} \left (\sqrt [3]{a} + \sqrt [3]{b} x\right ) \left (a^{\frac{2}{3}} e + \frac{5 b^{\frac{2}{3}} c \left (- \sqrt{3} + 1\right )}{2}\right ) F\left (\operatorname{asin}{\left (\frac{- \sqrt [3]{a} \left (-1 + \sqrt{3}\right ) + \sqrt [3]{b} x}{\sqrt [3]{a} \left (1 + \sqrt{3}\right ) + \sqrt [3]{b} x} \right )}\middle | -7 - 4 \sqrt{3}\right )}{15 b^{\frac{4}{3}} \sqrt{\frac{\sqrt [3]{a} \left (\sqrt [3]{a} + \sqrt [3]{b} x\right )}{\left (\sqrt [3]{a} \left (1 + \sqrt{3}\right ) + \sqrt [3]{b} x\right )^{2}}} \sqrt{a + b x^{3}}} + \frac{2 d \sqrt{a + b x^{3}}}{3 b} + \frac{2 e x \sqrt{a + b x^{3}}}{5 b} + \frac{2 c \sqrt{a + b x^{3}}}{b^{\frac{2}{3}} \left (\sqrt [3]{a} \left (1 + \sqrt{3}\right ) + \sqrt [3]{b} x\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  rubi_integrate(x*(e*x**2+d*x+c)/(b*x**3+a)**(1/2),x)

[Out]

-3**(1/4)*a**(1/3)*c*sqrt((a**(2/3) - a**(1/3)*b**(1/3)*x + b**(2/3)*x**2)/(a**(
1/3)*(1 + sqrt(3)) + b**(1/3)*x)**2)*sqrt(-sqrt(3) + 2)*(a**(1/3) + b**(1/3)*x)*
elliptic_e(asin((-a**(1/3)*(-1 + sqrt(3)) + b**(1/3)*x)/(a**(1/3)*(1 + sqrt(3))
+ b**(1/3)*x)), -7 - 4*sqrt(3))/(b**(2/3)*sqrt(a**(1/3)*(a**(1/3) + b**(1/3)*x)/
(a**(1/3)*(1 + sqrt(3)) + b**(1/3)*x)**2)*sqrt(a + b*x**3)) - 4*3**(3/4)*a**(1/3
)*sqrt((a**(2/3) - a**(1/3)*b**(1/3)*x + b**(2/3)*x**2)/(a**(1/3)*(1 + sqrt(3))
+ b**(1/3)*x)**2)*sqrt(sqrt(3) + 2)*(a**(1/3) + b**(1/3)*x)*(a**(2/3)*e + 5*b**(
2/3)*c*(-sqrt(3) + 1)/2)*elliptic_f(asin((-a**(1/3)*(-1 + sqrt(3)) + b**(1/3)*x)
/(a**(1/3)*(1 + sqrt(3)) + b**(1/3)*x)), -7 - 4*sqrt(3))/(15*b**(4/3)*sqrt(a**(1
/3)*(a**(1/3) + b**(1/3)*x)/(a**(1/3)*(1 + sqrt(3)) + b**(1/3)*x)**2)*sqrt(a + b
*x**3)) + 2*d*sqrt(a + b*x**3)/(3*b) + 2*e*x*sqrt(a + b*x**3)/(5*b) + 2*c*sqrt(a
 + b*x**3)/(b**(2/3)*(a**(1/3)*(1 + sqrt(3)) + b**(1/3)*x))

_______________________________________________________________________________________

Mathematica [C]  time = 2.75785, size = 314, normalized size = 0.58 \[ \frac{2 i 3^{3/4} a^{2/3} \sqrt{\frac{(-1)^{5/6} \left (\sqrt [3]{-b} x-\sqrt [3]{a}\right )}{\sqrt [3]{a}}} \sqrt{\frac{(-b)^{2/3} x^2}{a^{2/3}}+\frac{\sqrt [3]{-b} x}{\sqrt [3]{a}}+1} \left (2 a^{2/3} \sqrt [3]{-b} e-5 b c\right ) F\left (\sin ^{-1}\left (\frac{\sqrt{-\frac{i \sqrt [3]{-b} x}{\sqrt [3]{a}}-(-1)^{5/6}}}{\sqrt [4]{3}}\right )|\sqrt [3]{-1}\right )+30 (-1)^{2/3} \sqrt [4]{3} a^{2/3} b c \sqrt{(-1)^{5/6} \left (\frac{\sqrt [3]{-b} x}{\sqrt [3]{a}}-1\right )} \sqrt{\frac{(-b)^{2/3} x^2}{a^{2/3}}+\frac{\sqrt [3]{-b} x}{\sqrt [3]{a}}+1} E\left (\sin ^{-1}\left (\frac{\sqrt{-\frac{i \sqrt [3]{-b} x}{\sqrt [3]{a}}-(-1)^{5/6}}}{\sqrt [4]{3}}\right )|\sqrt [3]{-1}\right )-2 (-b)^{2/3} \left (a+b x^3\right ) (5 d+3 e x)}{15 (-b)^{5/3} \sqrt{a+b x^3}} \]

Warning: Unable to verify antiderivative.

[In]  Integrate[(x*(c + d*x + e*x^2))/Sqrt[a + b*x^3],x]

[Out]

(-2*(-b)^(2/3)*(5*d + 3*e*x)*(a + b*x^3) + 30*(-1)^(2/3)*3^(1/4)*a^(2/3)*b*c*Sqr
t[(-1)^(5/6)*(-1 + ((-b)^(1/3)*x)/a^(1/3))]*Sqrt[1 + ((-b)^(1/3)*x)/a^(1/3) + ((
-b)^(2/3)*x^2)/a^(2/3)]*EllipticE[ArcSin[Sqrt[-(-1)^(5/6) - (I*(-b)^(1/3)*x)/a^(
1/3)]/3^(1/4)], (-1)^(1/3)] + (2*I)*3^(3/4)*a^(2/3)*(-5*b*c + 2*a^(2/3)*(-b)^(1/
3)*e)*Sqrt[((-1)^(5/6)*(-a^(1/3) + (-b)^(1/3)*x))/a^(1/3)]*Sqrt[1 + ((-b)^(1/3)*
x)/a^(1/3) + ((-b)^(2/3)*x^2)/a^(2/3)]*EllipticF[ArcSin[Sqrt[-(-1)^(5/6) - (I*(-
b)^(1/3)*x)/a^(1/3)]/3^(1/4)], (-1)^(1/3)])/(15*(-b)^(5/3)*Sqrt[a + b*x^3])

_______________________________________________________________________________________

Maple [A]  time = 0.01, size = 753, normalized size = 1.4 \[ \text{result too large to display} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  int(x*(e*x^2+d*x+c)/(b*x^3+a)^(1/2),x)

[Out]

2/3*d*(b*x^3+a)^(1/2)/b-2/3*I*c*3^(1/2)/b*(-a*b^2)^(1/3)*(I*(x+1/2/b*(-a*b^2)^(1
/3)-1/2*I*3^(1/2)/b*(-a*b^2)^(1/3))*3^(1/2)*b/(-a*b^2)^(1/3))^(1/2)*((x-1/b*(-a*
b^2)^(1/3))/(-3/2/b*(-a*b^2)^(1/3)+1/2*I*3^(1/2)/b*(-a*b^2)^(1/3)))^(1/2)*(-I*(x
+1/2/b*(-a*b^2)^(1/3)+1/2*I*3^(1/2)/b*(-a*b^2)^(1/3))*3^(1/2)*b/(-a*b^2)^(1/3))^
(1/2)/(b*x^3+a)^(1/2)*((-3/2/b*(-a*b^2)^(1/3)+1/2*I*3^(1/2)/b*(-a*b^2)^(1/3))*El
lipticE(1/3*3^(1/2)*(I*(x+1/2/b*(-a*b^2)^(1/3)-1/2*I*3^(1/2)/b*(-a*b^2)^(1/3))*3
^(1/2)*b/(-a*b^2)^(1/3))^(1/2),(I*3^(1/2)/b*(-a*b^2)^(1/3)/(-3/2/b*(-a*b^2)^(1/3
)+1/2*I*3^(1/2)/b*(-a*b^2)^(1/3)))^(1/2))+1/b*(-a*b^2)^(1/3)*EllipticF(1/3*3^(1/
2)*(I*(x+1/2/b*(-a*b^2)^(1/3)-1/2*I*3^(1/2)/b*(-a*b^2)^(1/3))*3^(1/2)*b/(-a*b^2)
^(1/3))^(1/2),(I*3^(1/2)/b*(-a*b^2)^(1/3)/(-3/2/b*(-a*b^2)^(1/3)+1/2*I*3^(1/2)/b
*(-a*b^2)^(1/3)))^(1/2)))+e*(2/5/b*x*(b*x^3+a)^(1/2)+4/15*I*a/b^2*3^(1/2)*(-a*b^
2)^(1/3)*(I*(x+1/2/b*(-a*b^2)^(1/3)-1/2*I*3^(1/2)/b*(-a*b^2)^(1/3))*3^(1/2)*b/(-
a*b^2)^(1/3))^(1/2)*((x-1/b*(-a*b^2)^(1/3))/(-3/2/b*(-a*b^2)^(1/3)+1/2*I*3^(1/2)
/b*(-a*b^2)^(1/3)))^(1/2)*(-I*(x+1/2/b*(-a*b^2)^(1/3)+1/2*I*3^(1/2)/b*(-a*b^2)^(
1/3))*3^(1/2)*b/(-a*b^2)^(1/3))^(1/2)/(b*x^3+a)^(1/2)*EllipticF(1/3*3^(1/2)*(I*(
x+1/2/b*(-a*b^2)^(1/3)-1/2*I*3^(1/2)/b*(-a*b^2)^(1/3))*3^(1/2)*b/(-a*b^2)^(1/3))
^(1/2),(I*3^(1/2)/b*(-a*b^2)^(1/3)/(-3/2/b*(-a*b^2)^(1/3)+1/2*I*3^(1/2)/b*(-a*b^
2)^(1/3)))^(1/2)))

_______________________________________________________________________________________

Maxima [F]  time = 0., size = 0, normalized size = 0. \[ \int \frac{{\left (e x^{2} + d x + c\right )} x}{\sqrt{b x^{3} + a}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((e*x^2 + d*x + c)*x/sqrt(b*x^3 + a),x, algorithm="maxima")

[Out]

integrate((e*x^2 + d*x + c)*x/sqrt(b*x^3 + a), x)

_______________________________________________________________________________________

Fricas [F]  time = 0., size = 0, normalized size = 0. \[{\rm integral}\left (\frac{e x^{3} + d x^{2} + c x}{\sqrt{b x^{3} + a}}, x\right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((e*x^2 + d*x + c)*x/sqrt(b*x^3 + a),x, algorithm="fricas")

[Out]

integral((e*x^3 + d*x^2 + c*x)/sqrt(b*x^3 + a), x)

_______________________________________________________________________________________

Sympy [A]  time = 3.08724, size = 107, normalized size = 0.2 \[ d \left (\begin{cases} \frac{x^{3}}{3 \sqrt{a}} & \text{for}\: b = 0 \\\frac{2 \sqrt{a + b x^{3}}}{3 b} & \text{otherwise} \end{cases}\right ) + \frac{c x^{2} \Gamma \left (\frac{2}{3}\right ){{}_{2}F_{1}\left (\begin{matrix} \frac{1}{2}, \frac{2}{3} \\ \frac{5}{3} \end{matrix}\middle |{\frac{b x^{3} e^{i \pi }}{a}} \right )}}{3 \sqrt{a} \Gamma \left (\frac{5}{3}\right )} + \frac{e x^{4} \Gamma \left (\frac{4}{3}\right ){{}_{2}F_{1}\left (\begin{matrix} \frac{1}{2}, \frac{4}{3} \\ \frac{7}{3} \end{matrix}\middle |{\frac{b x^{3} e^{i \pi }}{a}} \right )}}{3 \sqrt{a} \Gamma \left (\frac{7}{3}\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate(x*(e*x**2+d*x+c)/(b*x**3+a)**(1/2),x)

[Out]

d*Piecewise((x**3/(3*sqrt(a)), Eq(b, 0)), (2*sqrt(a + b*x**3)/(3*b), True)) + c*
x**2*gamma(2/3)*hyper((1/2, 2/3), (5/3,), b*x**3*exp_polar(I*pi)/a)/(3*sqrt(a)*g
amma(5/3)) + e*x**4*gamma(4/3)*hyper((1/2, 4/3), (7/3,), b*x**3*exp_polar(I*pi)/
a)/(3*sqrt(a)*gamma(7/3))

_______________________________________________________________________________________

GIAC/XCAS [F]  time = 0., size = 0, normalized size = 0. \[ \int \frac{{\left (e x^{2} + d x + c\right )} x}{\sqrt{b x^{3} + a}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((e*x^2 + d*x + c)*x/sqrt(b*x^3 + a),x, algorithm="giac")

[Out]

integrate((e*x^2 + d*x + c)*x/sqrt(b*x^3 + a), x)